home *** CD-ROM | disk | FTP | other *** search
/ Planet Source Code Jumbo …e CD Visual Basic 1 to 7 / 1_2002.ISO / Data / Zips / Complete C196855172001.psc / Client / help.frm (.txt) < prev   
Encoding:
Visual Basic Form  |  2001-04-28  |  2.1 KB  |  71 lines
  1. VERSION 5.00
  2. Begin VB.Form frmHelp 
  3.    AutoRedraw      =   -1  'True
  4.    BorderStyle     =   3  'Fixed Dialog
  5.    Caption         =   "Help Contents"
  6.    ClientHeight    =   3120
  7.    ClientLeft      =   45
  8.    ClientTop       =   330
  9.    ClientWidth     =   5460
  10.    BeginProperty Font 
  11.       Name            =   "Tahoma"
  12.       Size            =   8.25
  13.       Charset         =   0
  14.       Weight          =   400
  15.       Underline       =   0   'False
  16.       Italic          =   0   'False
  17.       Strikethrough   =   0   'False
  18.    EndProperty
  19.    Icon            =   "help.frx":0000
  20.    LinkTopic       =   "Form1"
  21.    MaxButton       =   0   'False
  22.    MinButton       =   0   'False
  23.    ScaleHeight     =   3120
  24.    ScaleWidth      =   5460
  25.    ShowInTaskbar   =   0   'False
  26.    StartUpPosition =   1  'CenterOwner
  27.    WhatsThisButton =   -1  'True
  28.    WhatsThisHelp   =   -1  'True
  29.    Begin VB.CommandButton Command1 
  30.       Cancel          =   -1  'True
  31.       Caption         =   "&Close"
  32.       Default         =   -1  'True
  33.       Height          =   420
  34.       Left            =   4455
  35.       TabIndex        =   1
  36.       Top             =   2655
  37.       Width           =   960
  38.    End
  39.    Begin VB.TextBox txHelp 
  40.       BackColor       =   &H80000004&
  41.       Height          =   2535
  42.       Left            =   45
  43.       Locked          =   -1  'True
  44.       MultiLine       =   -1  'True
  45.       ScrollBars      =   2  'Vertical
  46.       TabIndex        =   0
  47.       Text            =   "help.frx":030A
  48.       Top             =   45
  49.       Width           =   5370
  50.    End
  51.    Begin VB.Image Image1 
  52.       Height          =   480
  53.       Left            =   45
  54.       Picture         =   "help.frx":0ABE
  55.       Top             =   2655
  56.       Width           =   480
  57.    End
  58. Attribute VB_Name = "frmHelp"
  59. Attribute VB_GlobalNameSpace = False
  60. Attribute VB_Creatable = False
  61. Attribute VB_PredeclaredId = True
  62. Attribute VB_Exposed = False
  63. Option Explicit
  64. Private Declare Function HideCaret Lib "user32" (ByVal hwnd As Long) As Long
  65. Private Sub Command1_Click()
  66. Unload Me
  67. End Sub
  68. Private Sub Form_Load()
  69. HideCaret txHelp.hwnd
  70. End Sub
  71.